XML import

HCL Notes/Domino 8.5 Forum (includes Notes Traveler)

Subject: XML import

Feedback Type: Question

Product Area: Notes Client

Technical Area: Functionality

Platform: Windows

Release: 8.5.3

Reproducible: -Reproducibility-

The code below (run from a button) opens the correct web document but I then need to be able to parse the content and bring it back into my notes document. Can someone take me to the next step. The code as below does not work.

Thanks in advance for your help

Ken

Sub Click(Source As Button)
Dim Ws As New NotesUiWorkspace
Dim Uidoc As NotesUidocument
Set Uidoc= Ws.CurrentDocument
Dim IE As Variant
Set IE = CreateObject("InternetExplorer.Application")

IE.Height=450
Messagebox IE.height

IE.Width=550
IE.ToolBar=False
IE.StatusBar=False
IE.Resizable=False

IE.Navigate "http://pcls1.craftyclicks.co.uk/xml/rapidaddress?postcode=AA11AA"
IE.visible=True

'*** Select the text, copy it and past it into the html field ***
While IE.Busy
Sleep 5
Wend

Set objColl =IE.document.all

Call IE.ExecWB ( 17, 0 )
Call IE.ExecWB ( 12, 0 )
Call UiDoc.GotoField( "html" )
Call UiDoc.Paste

'*** Close the browser ***
Call IE.Quit
End Sub

Feedback number WEBB9HUMWM created by ~Yoshi Fezfoooden on 04/04/2014

Status: Open
Comments: